home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 4 / BBS in a Box - Macintosh - Volume IV (January 1992) (BBS in a Box).iso / Files / Hyper / M-Md / MacABadge.cpt / MacABadge / card_3292.txt < prev    next >
Encoding:
Text File  |  1987-12-16  |  3.8 KB  |  194 lines
  1. -- card: 3292 from stack: in
  2. -- bmap block id: 9090
  3. -- flags: 0000
  4. -- background id: 4360
  5. -- name: OrderForm
  6.  
  7.  
  8. -- part 8 (button)
  9. -- low flags: 00
  10. -- high flags: A003
  11. -- rect: left=165 top=314 right=336 bottom=265
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Text Styles
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   get loc of Card Field "ButtonField"
  23.   click at it
  24.   doMenu Text Style...
  25. end mouseUp
  26.  
  27.  
  28.  
  29. -- part 10 (field)
  30. -- low flags: 00
  31. -- high flags: 6004
  32. -- rect: left=205 top=25 right=84 bottom=508
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 0
  36. -- font id: 3
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: address
  41.  
  42.  
  43. -- part 11 (field)
  44. -- low flags: 01
  45. -- high flags: 0000
  46. -- rect: left=375 top=91 right=334 bottom=512
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 65535
  50. -- font id: 3
  51. -- text size: 12
  52. -- style flags: 256
  53. -- line height: 16
  54. -- part name: 
  55.  
  56.  
  57. -- part 12 (button)
  58. -- low flags: 00
  59. -- high flags: 0000
  60. -- rect: left=94 top=24 right=54 bottom=129
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 20098 / 20098
  63. -- text alignment: 1
  64. -- font id: 0
  65. -- text size: 12
  66. -- style flags: 0
  67. -- line height: 16
  68. -- part name: Home
  69. ----- HyperTalk script -----
  70. on mouseUp
  71.   Hide Tool Window
  72.   Hide Pattern Window
  73.   doMenu Compact Stack
  74.   visual effect iris close
  75.   go home
  76. end mouseUp
  77.  
  78.  
  79.  
  80. -- part 14 (button)
  81. -- low flags: 00
  82. -- high flags: 8000
  83. -- rect: left=108 top=91 right=137 bottom=156
  84. -- title width / last selected line: 0
  85. -- icon id / first selected line: 1007 / 1007
  86. -- text alignment: 1
  87. -- font id: 0
  88. -- text size: 12
  89. -- style flags: 0
  90. -- line height: 16
  91. -- part name: Print It!
  92. ----- HyperTalk script -----
  93. on mouseUp
  94.   show Background Field "Temphider"
  95.   doMenu "Print Card"
  96.   doMenu "Print Card"
  97.   hide Background Field "Temphider"
  98. end mouseUp
  99.  
  100.  
  101.  
  102. -- part 18 (button)
  103. -- low flags: 00
  104. -- high flags: 0000
  105. -- rect: left=464 top=303 right=342 bottom=512
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 14953 / 14953
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: 
  114. ----- HyperTalk script -----
  115. on mouseUp
  116.   Hide Tool Window
  117.   Hide Pattern Window
  118.   Get the userLevel
  119.   Set the userLevel to 1
  120.   visual effect iris close
  121.   go to card "IndexCard"
  122. end mouseUp
  123.  
  124.  
  125.  
  126. -- part 19 (button)
  127. -- low flags: 00
  128. -- high flags: 0000
  129. -- rect: left=0 top=308 right=342 bottom=39
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 1016 / 1016
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: Prev
  138. ----- HyperTalk script -----
  139. on mouseUp
  140.   visual scroll right
  141.   go to previous card
  142. end mouseUp
  143.  
  144.  
  145. -- part 21 (button)
  146. -- low flags: 00
  147. -- high flags: 0000
  148. -- rect: left=43 top=308 right=342 bottom=83
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 32670 / 32670
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: View
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   show all cards
  160. end mouseUp
  161.  
  162.  
  163.  
  164. -- part 26 (field)
  165. -- low flags: 00
  166. -- high flags: 0000
  167. -- rect: left=191 top=134 right=294 bottom=354
  168. -- title width / last selected line: 0
  169. -- icon id / first selected line: 0 / 0
  170. -- text alignment: 1
  171. -- font id: 0
  172. -- text size: 24
  173. -- style flags: 10240
  174. -- line height: 32
  175. -- part name: ButtonField
  176.  
  177.  
  178. -- part contents for card part 11
  179. ----- text -----
  180. For each badge desired, click the ‚ÄúPrint It!‚Äù icon, send your design 
  181. (one plus a spare) 
  182. along with $2.00 
  183. (payable to 
  184. S.A.Wiltse) to 
  185. the Starving Artist Workshop‚Ñ¢
  186. 186 Western Ave.
  187. Albany, NY  
  188. 12203-1227
  189.  
  190. -- part contents for card part 26
  191. ----- text -----
  192.  
  193. Macintosh
  194. Forever